#########################################################################
# Figure2.R
#########################################################################

library(tidyverse)
library(ggpubr)
source("Figure3_a.R")
source("Figure3_b.R")

ggpubr::ggarrange(p_oakland, p_alaska, ncol = 1)

ggsave("Figure3.pdf", width = 6, height = 6.5)

#############################################################################
# END OF THIS R SOURCE FILE
#############################################################################
